*This code creates Figure 1

eststo M3a: logit allbuster_1pct lagts3p lnlaggdpp c.lnlaggdpt##c.lnlaggdpt lagtradeopenp i.DefPactPT i.sanct_sev idealpointdistance duration arcsin_min nobust_1pct nobustsq_1pct nobustcb_1pct if P_Sender !=1

*Data that comes from this command produces the # of incidents of sanctions busting 
*and is added to Table 3 & Table 4a:
tab allbuster_1pct if e(sample)

*This code is used to create Figure 1:
graph bar (sum) allbuster_1pct if e(sample), over(target_bust, relabel(1 `""Smallest" "($145m-$973m)""' ///
	2 `""Small" "($973m-$6.42b)""'  ///
	3 `""Medium" "($6.42b-$282b)""'  ///
	4 `""Large" "($282b-$1.87t)""'  ///
	5 `""Largest" "($1.87t-$11.26t)""')) ///
    blabel(bar, size(small)) title("Sanctions Busting Events Across Target's Economic Size") ///
	ytitle("Sanctions Busting Events") b1title("Target's Economic Size")
